home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er
/
64ER_CD.iso
/
sh1x
/
sh16a.d64
/
twm-listing 8
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
1995-03-30
|
249b
|
19 lines
0 REM BOX-DEMO 2
5 :
10 OK=1
20 (null)1,20,19,24,39,1
30 (null)1,14,128
40 (null)1
50 (null) 1,2,"NICHT OK"
60 (null) 1,14,"OK"
70 (null)
80 (null)0,1,1,1,10,1
90 (null)1,1,12,1,17,1
100 (null) OK
110 (null)
120 (null)1
130 :
140 PRINT "OK ="OK", D.H. ";
150 IF OK=0 THEN PRINT"N E I N" :END
160 PRINT"J A"